perm filename RTEST.SAV[CM,DEK] blob
sn#788812 filedate 1985-03-20 generic text, type T, neo UTF8
This is METAFONT, WAITS Version 0.77 (preloaded base=plain 85.3.11) 20 MAR 1985 22:00
**rtest
(RTEST.MF[CM,DEK] (CMBASE.MF[CM,DEK]) (CMR10.MF[CM,DEK]) (TEST.MF[CM,DEK]
The letter C [67]
done with character 67
The letter Q
>> 0.66667x10+46.66595
! Undefined x coordinate has been replaced by 0.
<to be read again>
{
<for(l)> ...}..z5(SUFFIX0){right}..z6(SUFFIX0){
right}..z7(SUFFIX0){up}; EN...
stroke->...s.e=l,r:path_.e:=(TEXT2);endfor
.path_.l--reverse.path_.r--...
<to be read again>
;
p.4,l.25 ...e{right}..z6e{right}..z7e{up};
fi % tail
?
>> 0.66667x10+49.19354
! Undefined x coordinate has been replaced by 0.
<to be read again>
{
<for(r)> ...}..z5(SUFFIX0){right}..z6(SUFFIX0){
right}..z7(SUFFIX0){up}; EN...
stroke->...s.e=l,r:path_.e:=(TEXT2);endfor
.path_.l--reverse.path_.r--...
<to be read again>
;
p.4,l.25 ...e{right}..z6e{right}..z7e{up};
fi % tail
?
[81]
done with character 81
The letter R
>> (x8l-4,y8)
>> 158
! Equation cannot be performed (pair=numeric).
<to be read again>
;
p.5,l.22 ...t z8l=round(x5-u-.5cap_curve);
?
>> (x0l-4,y0l)
>> 158
! Equation cannot be performed (pair=numeric).
<to be read again>
;
p.5,l.22 ...t z8l=round(x5-u-.5cap_curve);
? s
OK, entering scrollmode...
>> %CAPSULE3858
>> (-x9l+249.99995,41.75002)
! Not implemented: (unknown numeric)*(unknown pair).
<to be read again>
]
p.5,l.25 (x,y9l)=whatever[z9r,z10l]
; x9l:=x;
I'm afraid I don't know how to apply that operation to that
combination of types. Continue, and I'll return the second
argument (see above) as the result of the operation.
! Inconsistent equation (off by 41.74997).
<to be read again>
;
p.5,l.25 (x,y9l)=whatever[z9r,z10l];
x9l:=x;
The equation I just read contradicts what was said before.
But don't worry; continue and I'll just ignore it.
>> x0l
! Undefined x coordinate has been replaced by 0.
<to be read again>
..
<for(l)> ...FIX0)if.str(SUFFIX0)="r":---else:..
fi.z8(SUFFIX0)..tension.atl...
stroke->...s.e=l,r:path_.e:=(TEXT2);endfor
.path_.l--reverse.path_.r--...
<to be read again>
;
p.5,l.27 ...ast .95..z9e{right}..z10e{up};
% tail
I need a `known' x value for this part of the path.
The value I found (see above) was no good;
so I'll try to keep going by using zero instead.
>> x8l
! Undefined x coordinate has been replaced by 0.
<to be read again>
..
<for(l)> ...IX0)="r":---else:..fi.z8(SUFFIX0)..
tension.atleast0.95..z9(SUF...
stroke->...s.e=l,r:path_.e:=(TEXT2);endfor
.path_.l--reverse.path_.r--...
<to be read again>
;
p.5,l.27 ...ast .95..z9e{right}..z10e{up};
% tail
I need a `known' x value for this part of the path.
The value I found (see above) was no good;
so I'll try to keep going by using zero instead.
>> x0l-24.00005
! Undefined x coordinate has been replaced by 0.
<to be read again>
..
---->..
tension.infinity..
<for(r)> ....z0(SUFFIX0)if.str(SUFFIX0)="r":---
else:..fi.z8(SUFFIX0)..tens...
stroke->...s.e=l,r:path_.e:=(TEXT2);endfor
.path_.l--reverse.path_.r--...
<to be read again>
;
p.5,l.27 ...ast .95..z9e{right}..z10e{up};
% tail
I need a `known' x value for this part of the path.
The value I found (see above) was no good;
so I'll try to keep going by using zero instead.
>> x8l-29.00005
! Undefined x coordinate has been replaced by 0.
<to be read again>
..
<for(r)> ...IX0)="r":---else:..fi.z8(SUFFIX0)..
tension.atleast0.95..z9(SUF...
stroke->...s.e=l,r:path_.e:=(TEXT2);endfor
.path_.l--reverse.path_.r--...
<to be read again>
;
p.5,l.27 ...ast .95..z9e{right}..z10e{up};
% tail
I need a `known' x value for this part of the path.
The value I found (see above) was no good;
so I'll try to keep going by using zero instead.
>> x9
! Undefined x coordinate has been replaced by 0.
<to be read again>
{
<for(r)> .....tension.atleast0.95..z9(SUFFIX0){
right}..z10(SUFFIX0){up}; E...
stroke->...s.e=l,r:path_.e:=(TEXT2);endfor
.path_.l--reverse.path_.r--...
<to be read again>
;
p.5,l.27 ...ast .95..z9e{right}..z10e{up};
% tail
I need a `known' x value for this part of the path.
The value I found (see above) was no good;
so I'll try to keep going by using zero instead.
[82]
done with character 82
The letter S
>> -0.27779
! Isolated expression.
<to be read again>
;
p.6,l.3 italsorr cap_height#*slant-.5u#;
I couldn't find an `=' or `:=' after the
expression that is shown above this error message,
so I guess I'll just ignore it and carry on.
>> p_==
! Isolated expression.
<to be read again>
((89.99997,240.50002))
parallel_pos->...group.pair.p_;p_==(EXPR5)
+whatever*((EXPR3)-(EXPR4))...
p.6,l.12 ...bar,cap_ess]-fine,z3l,z2l,z2r)
;
I couldn't find an `=' or `:=' after the
expression that is shown above this error message,
so I guess I'll just ignore it and carry on.
! Extra tokens will be flushed.
<to be read again>
((89.99997,240.50002))
parallel_pos->...group.pair.p_;p_==(EXPR5)
+whatever*((EXPR3)-(EXPR4))...
p.6,l.12 ...bar,cap_ess]-fine,z3l,z2l,z2r)
;
I've just read as much of that statement as I could fathom,
so a semicolon should have been next. It's very puzzling...
but I'll try to get myself back together, by ignoring
everything up to the next `;'. Please insert a semicolon
now in front of anything that you don't want me to delete.
(See Chapter xx of The METAFONTbook for an example.)
>> (-xpart p_+23.5,-ypart p_+185.23947)
! Not implemented: length(unknown pair).
<to be read again>
;
parallel_pos->...d_;d_=length((EXPR3)-p_);
if.d_≥(EXPR2):p_.else:p_+((...
p.6,l.12 ...bar,cap_ess]-fine,z3l,z2l,z2r)
;
I'm afraid I don't know how to apply that operation to that
particular type. Continue, and I'll simply return the
argument (shown above) as the result of the operation.
>> d_
>> (-xpart p_+23.5,-ypart p_+185.23947)
! Equation cannot be performed (numeric=pair).
<to be read again>
;
parallel_pos->...d_;d_=length((EXPR3)-p_);
if.d_≥(EXPR2):p_.else:p_+((...
p.6,l.12 ...bar,cap_ess]-fine,z3l,z2l,z2r)
;
I'm sorry, but I don't know how to make such things equal.
(See the two expressions just above the error message.)
>> d_-16.00017
! Unknown relation will be considered false.
<to be read again>
:
parallel_pos->...EXPR3)-p_);if.d_≥(EXPR2):
p_.else:p_+((EXPR2)+-+d_)*u...
p.6,l.12 ...bar,cap_ess]-fine,z3l,z2l,z2r)
;
Oh dear. I can't decide if the expression above is positive,
negative, or zero. So this comparison test won't be `true'.
>> 16.00017
>> d_
! Not implemented: (known numeric)+-+(unknown numeric).
<to be read again>
)
parallel_pos->...p_.else:p_+((EXPR2)+-+d_)
*unitvector((EXPR4)-(EXPR3)...
p.6,l.12 ...bar,cap_ess]-fine,z3l,z2l,z2r)
;
I'm afraid I don't know how to apply that operation to that
combination of types. Continue, and I'll return the second
argument (see above) as the result of the operation.
>> p_==
! Isolated expression.
<to be read again>
((x7l,y7l))
parallel_pos->...group.pair.p_;p_==(EXPR5)
+whatever*((EXPR3)-(EXPR4))...
p.6,l.13 ...bar,cap_ess]-fine,z6r,z7r,z7l)
;
I couldn't find an `=' or `:=' after the
expression that is shown above this error message,
so I guess I'll just ignore it and carry on.
! Extra tokens will be flushed.
<to be read again>
((x7l,y7l))
parallel_pos->...group.pair.p_;p_==(EXPR5)
+whatever*((EXPR3)-(EXPR4))...
p.6,l.13 ...bar,cap_ess]-fine,z6r,z7r,z7l)
;
I've just read as much of that statement as I could fathom,
so a semicolon should have been next. It's very puzzling...
but I'll try to get myself back together, by ignoring
everything up to the next `;'. Please insert a semicolon
now in front of anything that you don't want me to delete.
(See Chapter xx of The METAFONTbook for an example.)
>> (-xpart p_+176.5,-ypart p_+65.4847)
! Not implemented: length(unknown pair).
<to be read again>
;
parallel_pos->...d_;d_=length((EXPR3)-p_);
if.d_≥(EXPR2):p_.else:p_+((...
p.6,l.13 ...bar,cap_ess]-fine,z6r,z7r,z7l)
;
I'm afraid I don't know how to apply that operation to that
particular type. Continue, and I'll simply return the
argument (shown above) as the result of the operation.
>> d_
>> (-xpart p_+176.5,-ypart p_+65.4847)
! Equation cannot be performed (numeric=pair).
<to be read again>
;
parallel_pos->...d_;d_=length((EXPR3)-p_);
if.d_≥(EXPR2):p_.else:p_+((...
p.6,l.13 ...bar,cap_ess]-fine,z6r,z7r,z7l)
;
I'm sorry, but I don't know how to make such things equal.
(See the two expressions just above the error message.)
>> d_-16.00017
! Unknown relation will be considered false.
<to be read again>
:
parallel_pos->...EXPR3)-p_);if.d_≥(EXPR2):
p_.else:p_+((EXPR2)+-+d_)*u...
p.6,l.13 ...bar,cap_ess]-fine,z6r,z7r,z7l)
;
Oh dear. I can't decide if the expression above is positive,
negative, or zero. So this comparison test won't be `true'.
>> 16.00017
>> d_
! Not implemented: (known numeric)+-+(unknown numeric).
<to be read again>
)
parallel_pos->...p_.else:p_+((EXPR2)+-+d_)
*unitvector((EXPR4)-(EXPR3)...
p.6,l.13 ...bar,cap_ess]-fine,z6r,z7r,z7l)
;
I'm afraid I don't know how to apply that operation to that
combination of types. Continue, and I'll return the second
argument (see above) as the result of the operation.
>> (x7r-176.5,-69.98471)
! Not implemented: length(unknown pair).
<to be read again>
endgroup
<to be read again>
endgroup
p.6,l.13 ...bar,cap_ess]-fine,z6r,z7r,z7l)
;
I'm afraid I don't know how to apply that operation to that
particular type. Continue, and I'll simply return the
argument (shown above) as the result of the operation.
>> (x7r-176.5,-69.98471)
>> (x7r-176.5,-69.98471)
! Not implemented: (unknown pair)/(unknown pair).
<to be read again>
endgroup
<to be read again>
endgroup
p.6,l.13 ...bar,cap_ess]-fine,z6r,z7r,z7l)
;
I'm afraid I don't know how to apply that operation to that
combination of types. Continue, and I'll return the second
argument (see above) as the result of the operation.
>> d_
>> (x7r-176.5,-69.98471)
! Not implemented: (unknown numeric)*(unknown pair).
<to be read again>
endgroup
p.6,l.13 ...bar,cap_ess]-fine,z6r,z7r,z7l)
;
I'm afraid I don't know how to apply that operation to that
combination of types. Continue, and I'll return the second
argument (see above) as the result of the operation.
>> x7r+xpart p_-176.5
! Undefined x coordinate has been replaced by 0.
<to be read again>
{
<for(l)> ...least1and.atleast.tau..z6(SUFFIX0){
down}..tension.atleast.tau....
stroke->...s.e=l,r:path_.e:=(TEXT2);endfor
.path_.l--reverse.path_.r--...
<to be read again>
;
p.6,l.18 ...ension atleast tau..z7e{left};
% main stroke
I need a `known' x value for this part of the path.
The value I found (see above) was no good;
so I'll try to keep going by using zero instead.
>> ypart p_-69.98471
! Undefined y coordinate has been replaced by 0.
<to be read again>
{
<for(l)> ...least1and.atleast.tau..z6(SUFFIX0){
down}..tension.atleast.tau....
stroke->...s.e=l,r:path_.e:=(TEXT2);endfor
.path_.l--reverse.path_.r--...
<to be read again>
;
p.6,l.18 ...ension atleast tau..z7e{left};
% main stroke
I need a `known' y value for this part of the path.
The value I found (see above) was no good;
so I'll try to keep going by using zero instead.
>> x7l
! Undefined x coordinate has been replaced by 0.
<to be read again>
{
<for(l)> .....tension.atleast.tau..z7(SUFFIX0){
left}; ENDFOR
stroke->...s.e=l,r:path_.e:=(TEXT2);endfor
.path_.l--reverse.path_.r--...
<to be read again>
;
p.6,l.18 ...ension atleast tau..z7e{left};
% main stroke
I need a `known' x value for this part of the path.
The value I found (see above) was no good;
so I'll try to keep going by using zero instead.
>> y7l
! Undefined y coordinate has been replaced by 0.
<to be read again>
{
<for(l)> .....tension.atleast.tau..z7(SUFFIX0){
left}; ENDFOR
stroke->...s.e=l,r:path_.e:=(TEXT2);endfor
.path_.l--reverse.path_.r--...
<to be read again>
;
p.6,l.18 ...ension atleast tau..z7e{left};
% main stroke
I need a `known' y value for this part of the path.
The value I found (see above) was no good;
so I'll try to keep going by using zero instead.
>> x3r
! Undefined x coordinate has been replaced by 0.
<to be read again>
{
<for(r)> .....tension.atleast.tau..z3(SUFFIX0){
down}..tension.atleast.tau....
stroke->...s.e=l,r:path_.e:=(TEXT2);endfor
.path_.l--reverse.path_.r--...
<to be read again>
;
p.6,l.18 ...ension atleast tau..z7e{left};
% main stroke
I need a `known' x value for this part of the path.
The value I found (see above) was no good;
so I'll try to keep going by using zero instead.
>> y3r
! Undefined y coordinate has been replaced by 0.
<to be read again>
{
<for(r)> .....tension.atleast.tau..z3(SUFFIX0){
down}..tension.atleast.tau....
stroke->...s.e=l,r:path_.e:=(TEXT2);endfor
.path_.l--reverse.path_.r--...
<to be read again>
;
p.6,l.18 ...ension atleast tau..z7e{left};
% main stroke
I need a `known' y value for this part of the path.
The value I found (see above) was no good;
so I'll try to keep going by using zero instead.
>> x7r
! Undefined x coordinate has been replaced by 0.
<to be read again>
{
<for(r)> .....tension.atleast.tau..z7(SUFFIX0){
left}; ENDFOR
stroke->...s.e=l,r:path_.e:=(TEXT2);endfor
.path_.l--reverse.path_.r--...
<to be read again>
;
p.6,l.18 ...ension atleast tau..z7e{left};
% main stroke
I need a `known' x value for this part of the path.
The value I found (see above) was no good;
so I'll try to keep going by using zero instead.
>> x7l
! Undefined x coordinate has been replaced by 0.
<to be read again>
{
<for(l)> path_(SUFFIX0):=z7(SUFFIX0){
left}..z8(SUFFIX0); ENDFOR
stroke->...s.e=l,r:path_.e:=(TEXT2);endfor
.path_.l--reverse.path_.r--...
<to be read again>
;
p.6,l.23 filldraw stroke z7e{left}..z8e;
{lower arc}
I need a `known' x value for this part of the path.
The value I found (see above) was no good;
so I'll try to keep going by using zero instead.
>> y7l
! Undefined y coordinate has been replaced by 0.
<to be read again>
{
<for(l)> path_(SUFFIX0):=z7(SUFFIX0){
left}..z8(SUFFIX0); ENDFOR
stroke->...s.e=l,r:path_.e:=(TEXT2);endfor
.path_.l--reverse.path_.r--...
<to be read again>
;
p.6,l.23 filldraw stroke z7e{left}..z8e;
{lower arc}
I need a `known' y value for this part of the path.
The value I found (see above) was no good;
so I'll try to keep going by using zero instead.
>> x7r
! Undefined x coordinate has been replaced by 0.
<to be read again>
{
<for(r)> path_(SUFFIX0):=z7(SUFFIX0){
left}..z8(SUFFIX0); ENDFOR
stroke->...s.e=l,r:path_.e:=(TEXT2);endfor
.path_.l--reverse.path_.r--...
<to be read again>
;
p.6,l.23 filldraw stroke z7e{left}..z8e;
{lower arc}
I need a `known' x value for this part of the path.
The value I found (see above) was no good;
so I'll try to keep going by using zero instead.
! Strange path (turning number is zero).
<to be read again>
;
p.6,l.23 filldraw stroke z7e{left}..z8e;
{lower arc}
The path doesn't have a counterclockwise orientation,
so I'll probably have trouble drawing it.
! A statement can't begin with `{'.
<to be read again>
{
p.6,l.23 ...ldraw stroke z7e{left}..z8e; {
lower arc}
I was looking for the beginning of a new statement.
If you just proceed without changing anything, I'll ignore
everything up to the next `;'. Please insert a semicolon
now in front of anything that you don't want me to delete.
(See Chapter xx of The METAFONTbook for an example.)
! Extra tokens will be flushed.
<to be read again>
{
p.6,l.23 ...ldraw stroke z7e{left}..z8e; {
lower arc}
I've just read as much of that statement as I could fathom,
so a semicolon should have been next. It's very puzzling...
but I'll try to get myself back together, by ignoring
everything up to the next `;'. Please insert a semicolon
now in front of anything that you don't want me to delete.
(See Chapter xx of The METAFONTbook for an example.)
! Redundant or inconsistent equation.
<to be read again>
;
p.6,l.25 upper_arc=z1{curl.5}..{left}z2;
lower_arc=z7{left}..z8;
An equation between already-known quantities can't help.
But don't worry; continue and I'll just ignore it.
>> y7
! Undefined y coordinate has been replaced by 0.
<to be read again>
{
p.6,l.25 ...rl.5}..{left}z2; lower_arc=z7{
left}..z8;
I need a `known' y value for this part of the path.
The value I found (see above) was no good;
so I'll try to keep going by using zero instead.
>> lower_arc
>> path
! Equation cannot be performed (numeric=path).
<to be read again>
;
p.6,l.25 ...ft}z2; lower_arc=z7{left}..z8;
I'm sorry, but I don't know how to make such things equal.
(See the two expressions just above the error message.)
>> path
! Not implemented: xpart(path).
<to be read again>
;
p.6,l.28 ...rc intersectiontimes z0..z1');
I'm afraid I don't know how to apply that operation to that
particular type. Continue, and I'll simply return the
argument (shown above) as the result of the operation.
>> t
>> path
! Equation cannot be performed (numeric=path).
<to be read again>
;
p.6,l.28 ...rc intersectiontimes z0..z1');
I'm sorry, but I don't know how to make such things equal.
(See the two expressions just above the error message.)
>> (t,0)
>> path
! Not implemented: subpath(unknown pair)of(path).
<to be read again>
{
--->{
curl1}..{curl1}
p.6,l.29 ...0--subpath(t,0) of upper_arc--
cycle; % upper barb
I'm afraid I don't know how to apply that operation to that
combination of types. Continue, and I'll return the second
argument (see above) as the result of the operation.
>> lower_arc
>> path
! Not implemented: (unknown numeric)intersectiontimes(path).
<to be read again>
..
p.6,l.30 ...wer_arc intersectiontimes z9..
z8');
I'm afraid I don't know how to apply that operation to that
combination of types. Continue, and I'll return the second
argument (see above) as the result of the operation.
>> path
! Not implemented: xpart(path).
<to be read again>
;
p.6,l.30 ...rc intersectiontimes z9..z8');
I'm afraid I don't know how to apply that operation to that
particular type. Continue, and I'll simply return the
argument (shown above) as the result of the operation.
>> t
>> path
! Equation cannot be performed (numeric=path).
<to be read again>
;
p.6,l.30 ...rc intersectiontimes z9..z8');
I'm sorry, but I don't know how to make such things equal.
(See the two expressions just above the error message.)
>> (t,1)
>> lower_arc
! Not implemented: subpath(unknown pair)of(unknown numeric).
<to be read again>
{
--->{
curl1}..{curl1}
p.6,l.31 ...9--subpath(t,1) of lower_arc--
cycle; % lower barb
I'm afraid I don't know how to apply that operation to that
combination of types. Continue, and I'll return the second
argument (see above) as the result of the operation.
>> lower_arc
! Undefined coordinates have been replaced by (0,0).
<to be read again>
{
--->{
curl1}..{curl1}
p.6,l.31 ...9--subpath(t,1) of lower_arc--
cycle; % lower barb
I need x and y numbers for this part of the path.
The value I found (see above) was no good;
so I'll try to keep going by using zero instead.
[83]
done with character 83
)
Output written on RTEST.GF[CM,DEK] (4 characters, 10188 bytes).